package com.zhangyj.action;

import java.io.File;
import java.io.FileFilter;
import java.io.FileInputStream;
import java.io.IOException;
import java.net.JarURLConnection;
import java.net.URL;
import java.net.URLDecoder;
import java.util.Enumeration;
import java.util.HashMap;
import java.util.LinkedHashSet;
import java.util.Map;
import java.util.Properties;
import java.util.Set;
import java.util.jar.JarEntry;
import java.util.jar.JarFile;

import javax.servlet.ServletContext;

import com.zhangyj.sso.CookieUserSSO;
import com.zhangyj.sso.SSO;

public class BoastContext {
	private Map<String, String> actionMap = new HashMap<String, String>();
	private Map<String, String> pageUrlMap = new HashMap<String, String>();
	private Map<String, UrlPattern> urlPatternMap = new HashMap<String, UrlPattern>();
	//private DaoManager daomanager;
	private Map<String, String> configMap = new HashMap<String, String>();
	private ServletContext servletContext;
	private static BoastContext boastContext = null;

	static BoastContext load(String path, ServletContext context) {
		if (boastContext == null) {
			boastContext = new BoastContext(path, context);
		}
		return boastContext;
	}

	public static BoastContext getActionContext() {
		return boastContext;
	}

	private BoastContext(String path, ServletContext context) {
		this.servletContext = context;
		try {
			this.biulderMap(BoastContext.class.getResource("/boast.properties").getPath(), this.configMap);
			String res = configMap.get("actionpacks");
			if (res == null) {
				res = "com.zhangyj.impl.actions";
			}
			String[] actionpacks = res.split("[,]");
			for (String p : actionpacks) {
				if (p.length() > 0) {
					initAction(p);
				}
			}
			initPage(path + "/templates.properties");
			initPattern(path + "/urlPattern.properties");
		} catch (Exception e) {
			e.printStackTrace();
		}
	}

	private void initAction(String packageName) throws Exception {
		Set<Class<?>> set = getClasses(packageName);
		for (Class<?> c:set) {
			RequestAction ra = c.getAnnotation(RequestAction.class);
			if (ra != null) {
				actionMap.put(ra.name(), c.getName());
			}
		}
	}

	private void initPattern(String path) throws IOException {
		Properties p = this.loadProperties(path);
		Enumeration<Object> enumeration = p.keys();
		while (enumeration.hasMoreElements()) {
			String key = (String) enumeration.nextElement();
			String value = p.getProperty(key);
			this.urlPatternMap.put(key, new UrlPattern(key, value));
		}
	}

	private void initPage(String path) throws IOException {
		biulderMap(path, this.pageUrlMap);
	}

	public AbstractAction getAction(String actionName) throws Exception {
		String className = this.actionMap.get(actionName);
		AbstractAction action = (AbstractAction) this.findObjectByName(className);
		action.init(servletContext);
		return action;
	}

	protected void destroy() {
		actionMap.clear();
		pageUrlMap.clear();
		urlPatternMap.clear();
		configMap.clear();

		actionMap = null;
		pageUrlMap = null;
		urlPatternMap = null;
		configMap = null;
	}

	public Object findObjectByName(String className) throws InstantiationException, IllegalAccessException, ClassNotFoundException {
		return Class.forName(className).newInstance();
	}

//	public static DaoManager getDaoManager() {
//		return boastContext.daomanager;
//	}

	public String getPage(String key) {
		String path = this.pageUrlMap.get(key);
		if (path == null) {
			path = key;
		}
		return path;
	}

	private Properties loadProperties(String path) throws IOException {
		Properties p = new Properties();
		p.load(new FileInputStream(path));
		return p;
	}

	private void biulderMap(String path, Map<String, String> map) throws IOException {
		Properties p = this.loadProperties(path);
		Enumeration<Object> enumeration = p.keys();
		while (enumeration.hasMoreElements()) {
			String key = (String) enumeration.nextElement();
			String value = (String) p.get(key);
			map.put(key, value.trim());
		}
	}

	public static UrlPattern getUrlPattern(String key) {
		return boastContext.urlPatternMap.get(key);
	}
	public static SSO getSSO() {
		return new CookieUserSSO();
	}
	public static boolean isDebug() {
		return "true".equals(boastContext.configMap.get("debug"));
	}
	
	public static String getConfigValue(String key) {
		return boastContext.configMap.get(key);
	}
	
	public static String getConfigValue(String key,String defaultVal) {
		String res = boastContext.configMap.get(key);
		if (res != null) {
			return res;
		}
		return defaultVal;
	}
	
	/** 
     * 从包package中获取所有的Class 
     *  
     * @param pack 
     * @return 
     */  
    public static Set<Class<?>> getClasses(String pack) {  
  
        // 第一个class类的集合  
        Set<Class<?>> classes = new LinkedHashSet<Class<?>>();  
        // 是否循环迭代  
        boolean recursive = true;  
        // 获取包的名字 并进行替换  
        String packageName = pack;  
        String packageDirName = packageName.replace('.', '/');  
        // 定义一个枚举的集合 并进行循环来处理这个目录下的things  
        Enumeration<URL> dirs;  
        try {  
            dirs = Thread.currentThread().getContextClassLoader().getResources(  
                    packageDirName);  
            // 循环迭代下去  
            while (dirs.hasMoreElements()) {  
                // 获取下一个元素  
                URL url = dirs.nextElement();  
                // 得到协议的名称  
                String protocol = url.getProtocol();  
                // 如果是以文件的形式保存在服务器上  
                if ("file".equals(protocol)) {  
                    System.err.println("file类型的扫描");  
                    // 获取包的物理路径  
                    String filePath = URLDecoder.decode(url.getFile(), "UTF-8");  
                    // 以文件的方式扫描整个包下的文件 并添加到集合中  
                    findAndAddClassesInPackageByFile(packageName, filePath,  
                            recursive, classes);  
                } else if ("jar".equals(protocol)) {  
                    // 如果是jar包文件  
                    // 定义一个JarFile  
                    System.err.println("jar类型的扫描");  
                    JarFile jar;  
                    try {  
                        // 获取jar  
                        jar = ((JarURLConnection) url.openConnection())  
                                .getJarFile();  
                        // 从此jar包 得到一个枚举类  
                        Enumeration<JarEntry> entries = jar.entries();  
                        // 同样的进行循环迭代  
                        while (entries.hasMoreElements()) {  
                            // 获取jar里的一个实体 可以是目录 和一些jar包里的其他文件 如META-INF等文件  
                            JarEntry entry = entries.nextElement();  
                            String name = entry.getName();  
                            // 如果是以/开头的  
                            if (name.charAt(0) == '/') {  
                                // 获取后面的字符串  
                                name = name.substring(1);  
                            }  
                            // 如果前半部分和定义的包名相同  
                            if (name.startsWith(packageDirName)) {  
                                int idx = name.lastIndexOf('/');  
                                // 如果以"/"结尾 是一个包  
                                if (idx != -1) {  
                                    // 获取包名 把"/"替换成"."  
                                    packageName = name.substring(0, idx)  
                                            .replace('/', '.');  
                                }  
                                // 如果可以迭代下去 并且是一个包  
                                if ((idx != -1) || recursive) {  
                                    // 如果是一个.class文件 而且不是目录  
                                    if (name.endsWith(".class")  
                                            && !entry.isDirectory()) {  
                                        // 去掉后面的".class" 获取真正的类名  
                                        String className = name.substring(  
                                                packageName.length() + 1, name  
                                                        .length() - 6);  
                                        try {  
                                            // 添加到classes  
                                            classes.add(Class  
                                                    .forName(packageName + '.'  
                                                            + className));  
                                        } catch (ClassNotFoundException e) {  
                                            // log  
                                            // .error("添加用户自定义视图类错误 找不到此类的.class文件");  
                                            e.printStackTrace();  
                                        }  
                                    }  
                                }  
                            }  
                        }  
                    } catch (IOException e) {  
                        // log.error("在扫描用户定义视图时从jar包获取文件出错");  
                        e.printStackTrace();  
                    }  
                }  
            }  
        } catch (IOException e) {  
            e.printStackTrace();  
        }  
  
        return classes;  
    }  
    /** 
     * 以文件的形式来获取包下的所有Class 
     *  
     * @param packageName 
     * @param packagePath 
     * @param recursive 
     * @param classes 
     */  
    public static void findAndAddClassesInPackageByFile(String packageName,  
            String packagePath, final boolean recursive, Set<Class<?>> classes) {  
        // 获取此包的目录 建立一个File  
        File dir = new File(packagePath);  
        // 如果不存在或者 也不是目录就直接返回  
        if (!dir.exists() || !dir.isDirectory()) {  
            // log.warn("用户定义包名 " + packageName + " 下没有任何文件");  
            return;  
        }  
        // 如果存在 就获取包下的所有文件 包括目录  
        File[] dirfiles = dir.listFiles(new FileFilter() {
            // 自定义过滤规则 如果可以循环(包含子目录) 或则是以.class结尾的文件(编译好的java类文件)  
            public boolean accept(File file) {  
                return (recursive && file.isDirectory())  
                        || (file.getName().endsWith(".class"));  
            }  
        });  
        // 循环所有文件  
        for (File file : dirfiles) {  
            // 如果是目录 则继续扫描  
            if (file.isDirectory()) {  
                findAndAddClassesInPackageByFile(packageName + "."  
                        + file.getName(), file.getAbsolutePath(), recursive,  
                        classes);  
            } else {  
                // 如果是java类文件 去掉后面的.class 只留下类名  
                String className = file.getName().substring(0,  
                        file.getName().length() - 6);  
                try {  
                    // 添加到集合中去  
                    //classes.add(Class.forName(packageName + '.' + className));  
                                         //经过回复同学的提醒，这里用forName有一些不好，会触发static方法，没有使用classLoader的load干净  
                                        classes.add(Thread.currentThread().getContextClassLoader().loadClass(packageName + '.' + className));    
                                } catch (ClassNotFoundException e) {  
                    // log.error("添加用户自定义视图类错误 找不到此类的.class文件");  
                    e.printStackTrace();  
                }  
            }  
        }  
    }
}
